
Partial Class Admin_AddSports
    Inherits BasePage
    Dim sportlist As Generic.List(Of SportDetails)
    Protected Sub GridView1_RowDeleting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GridView1.RowDeleting
        'Gem.DeleteGem(CInt(GridView1.DataKeys(e.RowIndex).Value))
        GridView1.DataBind()
    End Sub

    Protected Sub GridView1_RowUpdating(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs) Handles GridView1.RowUpdating
        GridView1.DataBind()
    End Sub

    Protected Sub GridView1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView1.SelectedIndexChanged

    End Sub
    Protected Sub bt_addSport_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles bt_addSport.Click
        Dim s As New Sport
        If Me.tb_addSport.Text.Length > 0 Then
            s.sportName = tb_addSport.Text
            s.Create()
            tb_addSport.Text = ""
        End If
    End Sub
End Class
